(ns amjil.driver
  (:import [org.openqa.selenium.firefox FirefoxDriver]))

; (def driver (FirefoxDriver.))

(defn quit
  []
  (.quit driver))

(defn open
  [url]
  (.get driver url))

(defn element-by-id
  [id]
  (.findElementById driver id))

(defn element-by-fn
  [func]
  (.findElement driver func))

(defn fill-text
  [elem text]
  (.clear elem)
  (.sendKeys elem (into-array [text])))

(defn submit
  [elem]
  (.click elem))

(defn get-text
  [elem]
  (.getText elem))

;inputCyrillic_ID
;ButtonTran_ID
;outPutTraditonalM_ID
